CASE invoicesSelQinvStatus.AsInteger OF
     0 : invoicesSelQstatus.AsString := 'Нет данных';
     1 : invoicesSelQstatus.AsString := 'В разработке';
     2 : invoicesSelQstatus.AsString := 'В разработке. Ошибка';
     3 : invoicesSelQstatus.AsString := 'Выставлен';
     4 : invoicesSelQstatus.AsString := 'На согласовании';
     5 : invoicesSelQstatus.AsString := 'Выставлен.Подписан получателем';
     6 : invoicesSelQstatus.AsString := 'Аннулирован';
     7 : invoicesSelQstatus.AsString := 'Выставлен.Аннулирован поставщиком';
     8 : invoicesSelQstatus.AsString := 'Не найдено';
     9 : invoicesSelQstatus.AsString := 'Ошибка';
   END;